﻿Public Class LoverQuery
    Inherits Query

    Public Property Lover As String
        Get
            If Me!lover IsNot Nothing Then
                Return System.Uri.UnescapeDataString(Me!lover)
            End If

            Return Nothing
        End Get
        Set(ByVal value As String)
            Me!lover = System.Uri.EscapeUriString(value)
        End Set
    End Property
End Class